home *** CD-ROM | disk | FTP | other *** search
/ Collection of Tools & Utilities / Collection of Tools and Utilities.iso / bbsutil / fwkcs117.zip / GETLOOK.BAT < prev    next >
DOS Batch File  |  1992-02-12  |  2KB  |  71 lines
  1. @echo off
  2. cls
  3. echo - Part of FWKCS(TM) Contents_Signature System, Version 1.17.
  4. echo - (C)Copyright Frederick W. Kantor 1989-1992. All rights reserved.
  5. echo -
  6. echo - Your use of the FWKCS(TM) Contents_Signature System is at solely your own
  7. echo - risk.  For safety, please have proper backups of your files.
  8. echo -
  9. echo - GETLOOK.BAT to get the remote Lookup option without installing the
  10. echo -             FWKCS(TM) Contents_Signature System;
  11. echo -             for use in the same directory with FWKCS.117 and FWKCS_TM.117.
  12. echo -
  13. echo - Usage:
  14. echo -
  15. echo -        GETLOOK "<enter>"
  16. if "%1" == "/*" goto end0
  17. echo -
  18. echo -  To quit, press Ctrl+C, then y
  19. echo -
  20. pause
  21. if not exist fwkcs.117 goto nd
  22. if not exist fwkcs_tm.117 goto cm
  23. ren fwkcs_tm.117 fwkcs_tm.com > nul
  24. fwkcs_tm < fwkcs.117 >fwkcstmp.117
  25. if errorlevel 1 goto fbad
  26. ren fwkcs_tm.com fwkcs_tm.117 > nul
  27. pkunzip fwkcstmp.117 fwkcs.com lookup.bat rcrosref.bat lookup.doc lookcref.blt register.doc -o > nul
  28. if errorlevel 51 goto fz
  29. if errorlevel 50 goto ns
  30. if errorlevel 1 goto fz
  31. goto end
  32. :ns
  33. echo -
  34. echo - There is apparently not enough space here for me to work in...
  35. echo -
  36. echo - After you have provided more space here, or moved my files to
  37. echo -   another drive with enough space,
  38. goto delbad
  39. :fz
  40. echo -
  41. echo - Error getting files.
  42. :delbad
  43. if exist fwkcs.com del fwkcs.com > nul
  44. if exist lookup.bat del lookup.bat > nul
  45. if exist rcrosref.bat del rcrosref.bat > nul
  46. if exist lookup.doc del lookup.doc > nul
  47. if exist lookcref.blt del lookcref.blt > nul
  48. if exist register.doc del register.doc > nul
  49. goto try
  50. :fbad
  51. ren fwkcs_tm.com fwkcs_tm.117 > nul
  52. echo -
  53. echo -  FWKCS.117 appears defective or incompatible. Execution aborted.
  54. :try
  55. echo -
  56. echo -  Please clean up, and try again. See README.TXT.
  57. goto end0
  58. :cm
  59. echo -
  60. echo -  I need FWKCS_TM.117.
  61. echo -
  62. echo -        I quit!
  63. goto end0
  64. :nd
  65. echo -
  66. echo -    Nothing to do!
  67. :end0
  68. echo -
  69. :end
  70. if exist fwkcstmp.117 del fwkcstmp.117 > nul
  71.